home *** CD-ROM | disk | FTP | other *** search
/ Imagine the Universe (9th Edition) / Imagine the Universe 9 - Disc 1.iso / pc / imagine / docs / science / try_l2 / javascript / emspectrum.js < prev    next >
Encoding:
Text File  |  2002-01-09  |  900 b   |  44 lines
  1. size1 = "Blank";
  2. size2 = "Blank";
  3. size3 = "Blank";
  4. size4 = "Blank";
  5.  
  6. function testButton(form) {
  7.     for (Count = 0; Count < 4; Count++) {
  8.         if (form.answer1[Count].checked)
  9.     size1 = Count;
  10.     if (form.answer2[Count].checked)
  11.     size2 = Count;
  12.     if (form.answer3[Count].checked)
  13.     size3 = Count;
  14.     if (form.answer4[Count].checked)
  15.     size4 = Count;
  16.     }
  17.     
  18.     RightAnswer1 = 3;
  19.     RightAnswer2 = 2;
  20.     RightAnswer3 = 1;
  21.     RightAnswer4 =  1;
  22.     
  23.     NumberCorrect = 0;
  24.     AnswerPage = 'emspectrum_solution.html';
  25.     
  26.     if (size1 == RightAnswer1) {
  27.         NumberCorrect++;
  28.     }
  29.     if (size2 == RightAnswer2) {
  30.         NumberCorrect++;
  31.     }
  32.     if (size3 == RightAnswer3) {
  33.         NumberCorrect++;
  34.     }
  35.     if (size4 == RightAnswer4) {
  36.         NumberCorrect++;
  37.     }
  38.     
  39.     alert ("You answered " +NumberCorrect + " out of 4 questions correctly!");
  40.     location = AnswerPage; 
  41. }
  42.  
  43.     
  44.